home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 152 / 152.d81 / program 4b (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  190b  |  10 lines
  1. 0 rem -- program 4b --
  2. 10 for j = 16384 to 16394
  3. 20 read d: t = t + d
  4. 30 poke j, d: next
  5. 40 if t <> 1438 then print "data error"::end
  6. 50 sys 16384
  7. 16384 data 169,160, 162,0
  8. 16388 data 157,0,4, 232
  9. 16392 data 208,250, 96
  10.